﻿Public Class ChoixVetoDate

    Public Event ModifSelection(ByVal sender As Object, ByVal e As ModifSelectionEventArgs)

    Public Sub New()

        ' Cet appel est requis par le Concepteur Windows Form.
        InitializeComponent()

        ' Ajoutez une initialisation quelconque après l'appel InitializeComponent().


    End Sub

    Public WriteOnly Property setListeVeto() As List(Of Veterinaires)
        Set(ByVal value As List(Of Veterinaires))
            CmbChoixVeto.Items.AddRange(value.ToArray)
        End Set
    End Property

    Private Sub CmbChoixVeto_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmbChoixVeto.SelectedIndexChanged, DtpChoixDate.ValueChanged
        RaiseEvent ModifSelection(Me, New ModifSelectionEventArgs(CmbChoixVeto.SelectedItem, DtpChoixDate.Value))
    End Sub

End Class
